home *** CD-ROM | disk | FTP | other *** search
/ Languguage OS 2 / Languguage OS II Version 10-94 (Knowledge Media)(1994).ISO / a_utils / ffccflow / ffccflow.lha / ffccc+flow / ffccc / KEYCOM.h < prev    next >
Text File  |  1992-07-31  |  2KB  |  39 lines

  1.       COMMON/KEYINP/NORSET,NGLSET,NKYINT,NKYNAM,NKYSTR,LKYSTR,NKYCHR,   
  2.      1  NORCOM(MXORST),KORCOM(MXORST),KEYREF(MXKEYS,7),KEYINT(MXKINT),  
  3.      2  KNAMRF(MXKNAM,2),KSTREF(MXKNAM,2),KKYSTA(MXKNAM),KKYEND(MXKNAM) 
  4.       COMMON/SKEYNP/SKYSTR,SKEYLS(MXKNAM)   
  5.       CHARACTER SKYSTR*(MDIMST),SKEYLS*(MXNMCH) 
  6. *IF DEF,NEVER   
  7. *-----------------------------------------------------------------------
  8. *    NORSET = no. of OR-sets
  9. *    NGLSET = no. of global commands
  10. *    NKYNAM = no. of names in SKEYLS
  11. *    NKYSTR = no. of strings in SKYSTR  
  12. *    LKYSTR = occupation of  SKYSTR 
  13. *    NKYCHR = no. of string refs in KSTREF  
  14. *    NORCOM = no. of commands / OR-set  
  15. *    KORCOM = start-1 of each OR-set in KEYREF  
  16. *    KEYREF 
  17. *            (I,1) = ref. number (=pos.) of key 
  18. *            (I,2) = no. of integers in KEYINT  
  19. *            (I,3) = start-1 of integers in KEYINT  
  20. *            (I,4) = no. of names in SKEYLS 
  21. *            (I,5) = start-1 of names in SKEYLS 
  22. *            (I,6) = no. of string refs in KSTREF   
  23. *            (I,7) = start-1 of string refs in KSTREF   
  24. *    KEYINT = integer list for sub-keys etc.
  25. *    KNAMRF 
  26. *            (I,1) = ref. to string following name, or zero if none,
  27. *                   or < 0 if to be ignored (illegal)   
  28. *            (I,2) = ref. to replacement string, or zero
  29. *    KSTREF 
  30. *            (I,1) = ref. to string (stand alone), or < 0 if illegal
  31. *            (I,2) = ref. to replacement string for above, or zero  
  32. *    KKYSTA = start of string in SKYSTR 
  33. *    KKYEND = end of string in SKYSTR   
  34. *   
  35. *    SKEYLS = name list for input commands  
  36. *    SKYSTR = contains stand-alone or name-associated strings   
  37. *-----------------------------------------------------------------------
  38. *EI 
  39.